Top 10k strings from MicroHobby Semanal - Issue 073-076 (1986)(Hobby Press)(es)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
5 pas=pas+10
5 ;" PARE LA CINTA ":
4 pas=pas+20
3 po,op;" ";
3 A$=A$(b(posx)+1
3 ;" ":
3 '''//'''''''''
2 i$((pis/10
2 fin tarta pantalla
2 ;r$;s$;t$:
2 -jj);"=";:
2 (po,op)=14
2 ''''//'''''''''''''''''''
1 z(i,j)=v(i,j):
1 z(i,j)=a(j):
1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
1 w(i,j)=z(jj+3
1 w(i,j)=-w(i,j)
1 v(i,j)=z(i,j):
1 u(s)=a(s):
1 total=total-1
1 r$=r$+"x":
1 r$=r$+"=":
1 r$=r$+")":
1 r$=r$+"(":
1 r$*(par>(ldif>3
1 presentacion
1 po,op;" ":
1 po,op;" ":
1 pis=pis-50
1 pis=pis-10
1 pis=pis+50
1 pis=pis+10
1 panta
1 o$=" MARK es un intrepido aventurero,ayudale a conseguir el tesoro del gran templo,para ello tienes que coger las 20 llaves Arriba...U Abajo...J Derecha...P Izquierda...O Salto...0 "
1 niv=orden:
1 memory &
1 len=a1+(a2-a1)*(a2>a1)
1 inicializar y marcadores y anagrama
1 inicializar
1 i$="bbbbbbbbbbbbbbbbbbbb":
1 i$-(p=fin)))=0
1 en2=(j$="o")+(j$="a"):
1 en1=(j$="p")+(j$="a"):
1 direccion=a
1 direccion=4050
1 direccion=2150
1 direccion=(
1 direccion+n
1 cuenta=cuenta-1
1 cuenta=cuenta+1
1 c+s(v)+w(v)=y
1 c$=c$+A$(b(i)
1 c$=c$+"^"+A$(b(i)+1
1 c$(len-a1+1
1 b(i)=b(i+1
1 b(i)=b(i)+1
1 b$(len-a2+1
1 a=direccion
1 a(s)=a(s)*y(3
1 a(j)=z(i,j):
1 a$(f)=l+48
1 YzYxYvYtYV
1 TZX por Manuel Gomez Amate
1 S.Element )
1 Pantalla
1 PROGRAMAS INCLUIDOS EN
1 Marck
1 Hobby Press
1 Glotoh ?3
1 Despejar
1 Chequeo
1 Castellano
1 Cargador M
1 CINTA 19 CARA A
1 C$=C$+"*"+A$(b(i)+1
1 Biblia R
1 B$=E$((pe+1
1 B$="("+B$+")":
1 A$=E$((pe+1
1 A$(b(posx))=
1 A$(b(i)))+A$(b(i)+1
1 ;r$;s$;t$;
1 ;A$;"=";B$;" ":
1 ;"pulsa una tecla":
1 ;"ax+by=c"''"dx+ey=f"
1 ;"Y sumando:"'''
1 ;"Y de la ecuacion ";2
1 ;"Sustituyendo en la ecuacion ";2
1 ;"SOLUCION :"'I$;"=";B$
1 ;"SE ACABARON TUS DIAS";
1 ;"PUNTOS";
1 ;"PULSA UNA TECLA":
1 ;"PULSA - Q - TECLA PARA EMPEZAR"
1 ;"PON EL CASETTE EN MARCHA"
1 ;"PARA LA CINTA":
1 ;"PARA EL CASETTE"
1 ;"PANTALLA";
1 ;"Operando: ";
1 ;"OBJETOS ";du:
1 ;"Multiplicando la ecuacion 1 por ":
1 ;"LO CONSEGUISTE";
1 ;"Introduce los valores de a,b,c, d,e y f"''"Si alguno es fraccionario intro-duce antes la letra 'f'"
1 ;"Igualando: ";:
1 ;"HAS FRACASADO":
1 ;"EXTERMINIO TOTAL"
1 ;"ESPERA, GENERANDO GRAFICOS"
1 ;"De la ecuacion ";ii+1
1 ;"De donde ";
1 ;"CONTINUO ?"
1 ;"AYUDAS :"'"P- parentesis"'"O- operaciones"'"N- ninguna"'"A- ambas dos"
1 ;"-Q- OTRA PARTIDA":
1 ;" tenemos:"
1 ;" PULSA UNA TECLA ":
1 ;" ":
1 ;" PARA EL CASSETTE "
1 ;" ":
1 ;" ";
1 ;" ";
1 ;" "
1 /////////////////////////////////'
1 -yax+par)*(ldif/(3
1 ,D.L.: M-36598-84
1 ,"5aekr|3ct|2t{3ktz2ry2sz2t{2t|2t|"
1 ,"32jp02ft02bx002bx002bx02ft002ko"
1 ,"00063kpzu1001_06b2p3fk02tz000024_#ecp"
1 ,"00063_2g1d2kn43puz000000041clu5_hqy|"
1 ,"00024_00000053_zu400001_#lcx#co}$~d$~k$~p"
1 ,"00024_000000051h3kp002uz#gkh#gkt$_d#d_l"
1 ,"00021_22b21|53fkpu000000006`ejouz#col$_p$_d"
1 ,"000062hns1_1x1|000001_007h2kpu3z"
1 ,"000043z2_00000000003_3z#kda$_e$_p"
1 ,"000041vy|001_0022s1n3x1|22i1d1_#e_v"
1 ,"000022_1d2is51|2nx00000007_dinsw{#h_}"
1 ,"0000062_di1n01q01t32w{00009_dix3ns1|"
1 ,"0000052_din05{1r3v00002uy#egu#fl}"
1 ,"0000042_3z000000003z2_#iea#dn|"
1 ,"0000033tz00002hm#k_h#f_t"
1 ,"0000023_01h052ru3m00008hmrw1|2_"
1 ,"00000043puz1j022e23_000091mc|2_fsx#ify"
1 ,"00000042_cg0000000024_#p_}$~p"
1 ,"00000021|1x1t1p1l1h1c01_#hjk#g_}#lf{$~g"
1 ,"000000024_00000091_w2chmr{"
1 ,"000000024_00000032w{#h_|#dnv"
1 ,"000000021_002gj02nw2r{1_#k_k#e_{$~n#em}"
1 +x,d+y)=14
1 +x,d+y)=12
1 +jj);"=";:
1 +jj);"=";
1 +i);"? ";z(i,1
1 ***********************
1 *(len-a2),p2-7
1 *(len-a1),p2+1
1 )=x*((x>64
1 );"/";z(i,2
1 ),r)=z(t+(3
1 ),r)*w(s,r):
1 )+(p=fin)))=1
1 )*yax*(ldif/
1 ))+"("+B$+")":
1 (tar=i(g))
1 (pon aqui tres espacios en blanco)
1 (otros cuantos espacios)
1 (l,c+s(v))=0
1 (c+x,d+y)=12
1 ("+c$+")":
1 ("+B$+")^2":
1 ("+B$+")^(1/("+C$+"))":
1 ''''//''''''''''''''''''''''''''''''//'''''''''''''''''''
1 '''''''//''
1 '''''''''''//''''''''''''''''''''''''''''''//'''''''''''''''''''
1 ''''''''''''''//''''''''''''''''''''''''''''''/////////////////////////////////////////////////////////////////
1 '''''''''''''''''''''''''//'
1 '''''''''''
1 ''''''''''
1 ''"Sustituyendo en ec.";ii+1
1 "numero impar de parentesis !!!":
1 "Valor? ";b:
1 "QUIERES QUE TE PLANTEE UN EJER- CICIO (s/ENTER) ";
1 "QUIERES LA SOLUCION NUMERICA "'"(s/n) ";
1 "QUE EXPRESION QUIERES QUE DESPE-JE : "'
1 "Pokes? ";n
1 "Num. de Kbytes de RAM (16 o 48) ";n:
1 "NO HAY ""="" !!!":
1 "MicroHobby Semanal numeros 73 a 76
1 "LINEA:";B;"COLUMNA:";C
1 "Direccion donde quiere cargar larutina (min. 25000, max. ";(n-500
1 "DIFICULTAD de 1 a 10 ";ldif
1 "1)INTRODUCIR ECUACIONES","2)METODO DE SUSTITUCION","3)METODO DE REDUCCION","4)METODO DE IGUALACION"
1 " y la 2 por ";:
1 " queda:"''
1 A.MARANON.":
1 A.MARANON 1985
1 ESTA CINTA UTILIZA
1 O LOAD "<NOMBRE>"
1 PARA CARGAR LOS
1 LOAD ""
1
1